Những câu hỏi liên quan
Văn Trần Đình
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2021 lúc 0:17

#include <bits/stdc++.h>

using namespace std;

long long a,b,c;

int main()

{

cin>>a>>b>>c;

if (a+b>c && b+c>a && a+c>b) cout<<"YES";

else cout<<"NO";

return 0;

}

Bình luận (0)
Văn Trần Đình
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2021 lúc 11:46

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

if (a+b>c) and (a+c>b) and (b+c>a) then writeln('Phai')

else writeln('Khong phai');

readln;

end.

Bình luận (0)
Minh Ngọc
Xem chi tiết
lê thị bích ngọc
7 tháng 12 2021 lúc 19:37

mình chưa hiểu rõ đề lắm nên mình sẽ làm tạm như thế này còn nếu bạn muốn kiểu khác thì cứ bình luận để mình làm lại.

câu 1 :

#include<iostream>

using namespace std;

int main() {

long long a;

cout << "giá trị của a: "; cin >> a;

if (a % 2 != 0 && a % 5 == 0) {

cout << "a là một số lẻ chia hết cho 5"

} else {

cout << "a không phải là một số lẻ chia hết cho 5";

}

return 0;

}

câu 2 :

#include<iostream>

using namespace std;

int main() {
int a;

cout << "giá trị của a là: "; cin >> a;

if (a % 2 == 0 && a % 5 == 0) {

cout << "a là một số chẵn chia hết cho 5";

} else {
cout << "a không phải là một số chẵn chia hết cho 5";

}

return 0;

}

(Mình viết ở ngôn ngữ C++)

Bình luận (0)
M Ạ C H N H A
Xem chi tiết
Nguyễn Mỹ Uyên
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2021 lúc 13:31

uses crt;

var a,b,c:longint;

begin

clrscr;

readln(a,b,c);

writeln(a*b*c);

readln;

end.

Bình luận (0)
Nguyễn Hiếu
Xem chi tiết
bạn nhỏ
27 tháng 1 2022 lúc 14:11

Tham khảo:

uses crt;
var a:array[1..5] of integer;
    i,t:integer;
    tb:real;
begin
     for i:=1 to 5 do readln(a[i]);
     t:=0;
    for i:=1 to 5 do t:=t+a[i];
    tb:=t/5;
    write(Tb);
    readln;
end.

Bình luận (0)
Nguyễn Hải Yến Nhi
27 tháng 1 2022 lúc 14:14

Uses crt;

Var a,b,c,d,e,g:longint;

Begin

Clrscr;

writeln(so thu nhat la);readln(a);

writeln(so thu nhat la);readln(b);

writeln(so thu nhat la);readln(c);

writeln(so thu nhat la);readln(d);

writeln(so thu nhat la);readln(e);

g:=a+b+c+d+e;

Writeln('Tong scua 5 so la',g);

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
27 tháng 1 2022 lúc 17:12

#include <bits/stdc++.h>

using namespace std;

long long x,i,t;

int main()

{

t=0;

for (i=1; i<=5; i++)

{

cin>>x;

t=t+x;

}

cout<<t;

return 0;

}

Bình luận (0)
Huyền Nguyễn
Xem chi tiết
Cheewin
9 tháng 11 2016 lúc 22:47

1.uses crt;

var n,gt:longint;

begin

clrscr;

repeat

write('nhap so n:');readln(n);

until n>0;

gt:=1;

while n>0 do

begin

gt:=gt*n;

n:=n-1;

end;

writeln('giai thua cua n la:',gt);

readln

end.

2. uses crt;

var a,b,c:real;

begin

clrscr;

write('nhap a=');readln(a);

write('nhap b=');readln(b);

write('nhap c=');readln(c);

if (a*a=b*b+c*c) or (b*=c*c+a*a) or (c*c=a*a+b*b) then writeln('khong phai la tam giac vuong');

readln

end.

 

Bình luận (0)
Phước Thiện Lê Hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
22 tháng 4 2021 lúc 21:27

1:

uses crt;

const fi='ketqua.txt'

var f1:text;

st:string;

i,d:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('Nhap xau:'); readln(st);

d:=length(st);

for i:=1 to d do 

 if st[i]=#32 then delete(st,i,1);

writeln(f1,st);

close(f1);

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
22 tháng 4 2021 lúc 21:29

2:

uses crt;

var a,b,c,d:integer;

{----------chuong-trinh-con-----------------------}

function min(x,y:integer):integer;

begin

if x<y then min:=x

else min:=y;

end;

{---------------chuong-trinh-chinh--------------------}

begin

clrscr;

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

write('d='); readln(d);

writeln(min(a,min(b,min(c,d))));

readln;

end.

Bình luận (1)
Minh Ngọc
Xem chi tiết
Nguyễn Anh Dũng
9 tháng 12 2021 lúc 20:50

var x, i : integer;

begin

     writeln('nhap so nguyen x : ')

     read(x);

     if ( x < 2) then writeln(' x khong phai so nguyen to');

     else if ( x > 2) then

        begin

              for i := 2 to ( x - 1) do

                  begin

                     if ( x mod i = 0) then writeln(' x khong la so nguyen to');

                  end;

        end;

    else

        writeln(' x la so nguyen to');

    readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
9 tháng 12 2021 lúc 23:11

#include <bits/stdc++.h>
using namespace std;
long long n;
//chuongtrinhcon
bool ktnt(long long n)
{
    if (n<2) return(false);
    else
    for (int i=2; i*i<=n;i++)
        if (n%i==0) return (false);
    return(true);

}
//chuongtrinhchinh
int main()
{
    //freopen("KTSNT.INP","r",stdin);
    //freopen("KTSNT.OUT","w",stdout);
    cin>>n;
    if (ktnt(n)==true) cout<<"1";
    else cout<<"0";
    return 0;
}

Bình luận (0)